Top 10k strings from MicroHobby Semanal - Issue 053-056 (1985)(Hobby Press)(es).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Magazines / Sinclair ZX Spectrum - Magazines - [TZX] (TOSEC-v2007-01-01) /

Back to the directory listing

  12 ;" PARE LA CINTA ":
   7 py,px;a$(k
   4 ey1,ex;g$;
   4 ey,ex1;g$;
   4 (NPROG/DOS)
   4 "22",CERO;B$:
   3 mas=mas-.5
   3 m$(ey,ex1+1
   3 A$=A$(b(posx)+1
   3 ;"PARE LA CINTA":
   2 xxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxzzzzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxxxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxxzxzzzzzzzzzzzzzzzzxxxxxxxxxxxxxzzxzzzzzzzzzzzzzzzzxxxxxxxxxzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxxxzzzzzzzzzzzzzzzzzzzzzzzzzzzzzxzzzzzzzzzzzzzzzz
   2 o$(ind)=a$:
   2 num=m(ind,jnd):
   2 micro     
   2 m(ind,i)=0
   2 m$(ey1,ex)
   2 m$(ey,ex1)
   2 m$(by,r-(1
   2 m$(by,r+(2
   2 UNO;"PONGA EN MARCHA LA CINTA";
   2 SPACE-UNO,X1
   2 SPACE-UNO,CERO:
   2 SPACE,LINEA:
   2 SPACE,CERO:
   2 I,CERO;,,:
   2 DOS=UNO+UNO
   2 CERO;"       ";
   2 C$="  Por favor, elija un programa  "
   2 B$="                                "
   2 ="L")-(378
   2 ;"TIENES ";
   2 ;"PULSE CUALQUIER TECLA."
   2 ;"PULSA UNA TECLA PARA EMPEZAR"
   2 ;"FICHAS";
   2 ;"CAMIONES: ";cam:
   2 ;"APOSTADAS":
   2 ;"        PULSA UNA TECLA"
   2 ,i)=m(ind-1
   2 *** CINTA-MICROHOBBY ***
   2 *(a$="^"):
   2 )+"*"+d$+"^"+
   2 (VALOR)<"A"
   2 "64"+NPROG)
   2 "5";"cara: ";
   2 "5";"Programa: ";
   2 "5";"Programa inexistente":
   2 "5";"'R' Vuelve al menu"
   2 "5";"'L' Carga el programa";
   2 "32"-I;C$(
   2 "22",CERO;C$(I
   2 "22",CERO;B$
   2 "22",CERO;
   2  Este es el 
   1 z;z;" FICHAS A ";
   1 z(k,j)=w(j)*lastx/xmax:
   1 z$=z$+"+"+
   1 z$(z,m)=raro
   1 z$(z,m)=k$
   1 z$(p2+p3*(p2=0
   1 y$)*(z$(p2+p3*(p2=0
   1 x=x0-(y0/max*
   1 x$="                                PRUEBA TU SUERTE EN LA RULETA ZX.PULSA ""P"" PARA EMPEZAR A JUGAR,""I"" PARA INSTRUCCIONES.                               "
   1 wtkthctacthaahcvukuhdubduhbbhdtuh
   1 w(j)=z(k,j):
   1 w$="PARA APOSTAR DEBERAS MOVER EL*ASTERISCO SITUADO EN LA PARTE*SUPERIOR DERECHA DEL RECUADRO*QUE APARECERA AHORA.*PARA ELLO USA LAS TECLAS ""5""*Y ""8"".CUANDO TENGAS COLOCADO*EL ASTERISCO JUNTO A LA CASILLA*QUE QUIERAS APOSTAR PULSA LA*""P"" Y A CONTINUACION INDICA*LA CANTIDAD QUE QUIERAS APOSTAR*PERO SI DESEAS CAMBIAR ALGUNA*APUESTA PULSA LA ""C"".*SOLO PODRAS CAMBIAR LA APUESTA*INMEDIATAMENTE DESPUES DE HACER*CADA UNA."
   1 w#q#:&\w#"$\
   1 total=tot:
   1 total=tot+3
   1 tot=total:
   1 tot=tot-apu
   1 tot=tot+apu:
   1 t)*(b-a)/5.5
   1 t$="VERDE"
   1 t$="BLANCO":
   1 sc=1000000
   1 res=(res=1
   1 rec);rec;"  CAMIONES: ";rec2:
   1 radio=m(ind,1
   1 r,bx;"JK":
   1 r$="CESAR":
   1 q(e$(i))=1
   1 pr=(pr-(shift=0
   1 po=a7)+(p8
   1 po=a6)+(p7
   1 po=a5)+(p6
   1 po=a4)+(p5
   1 po=a3)+(p4
   1 po=a2)+(p3
   1 po=a1)+(p2
   1 p8;p8;" FICHAS A ";
   1 p7;p7;" FICHAS A ";
   1 p6;p6;" FICHAS A ";
   1 p5;p5;" FICHAS A ";
   1 p4;p4;" FICHAS A ";
   1 p3;p3;" FICHAS A ";
   1 p2;p2;" FICHAS A ";
   1 p1;p1;" FICHAS A ";
   1 p1,p2,p3,p4,p5,p6,p7,p8
   1 p(n+gra1-gra2,6
   1 p(knd)=ind:
   1 p(gra1-gra2+1
   1 obtencion del polinomio
   1 num=m(ind,jnd)
   1 niv=orden:
   1 mas=mas+.5
   1 mas1=mas1-1
   1 m(ind,jnd)=num:
   1 m$=m$+"+"+
   1 m$(py1,px+1
   1 m$(py1,px)
   1 m$(py,px1+1
   1 m$(py,px1)
   1 m$(py,px-2
   1 m$(py,px-(1
   1 m$(py,px+2
   1 m$(py,px+(
   1 m$(f)="121212121212121212121212121212":
   1 m$(ey1,ex+1
   1 m$(ey1,ex)="3")
   1 m$(ey,ex1)="2")
   1 m$(ey,ex-1
   1 m$(ey,ex+1
   1 linea=linea+1
   1 lastx=xmax:
   1 k$=z$(p2+p3*(p2=0
   1 itas=itas+1
   1 ind=ind-(ind
   1 i(con)=(17
   1 hs=1000000
   1 gra2=gra2-1
   1 gra1=gra1-1
   1 e$=i$+"="+b$:
   1 descode   &
   1 dat=shift+(shift
   1 d$="<A@A@EDED   <=@A@ADEDE  @A@ADEDE    @=@ADADE E  ":
   1 d$(z$(p2+p3*(p2=0
   1 d$(k$);" de (";p2+p3*(p2=0
   1 d$(k$);" DIRECTAMENTE":
   1 d$(i$);"=";
   1 d$(e$(i)):
   1 cuenta=cuenta-1
   1 cuenta=cuenta+1
   1 comprensort
   1 cirujano  A
   1 carga la rutina de comprimir
   1 cara a    \
   1 c(c1)=c(c1)+1
   1 c$=c$+A$(b(i)
   1 c$=c$+"^"+A$(b(i)+1
   1 c$=":?>?>CBCB   >?>?BCBC    :;>?>?BCBC  >;>?B?BC C  ":
   1 by,r;":; ";
   1 by,r;" :;";
   1 by,r;" :; ";
   1 b(i)=b(i+1
   1 b(i)=b(i)+1
   1 b$=b$+"^"+
   1 b$="hiklQRUVYZ]^abde":
   1 almacen   
   1 a8=i(con):
   1 a7=i(con):
   1 a6=i(con):
   1 a5=i(con):
   1 a4=i(con):
   1 a3=i(con):
   1 a2=i(con):
   1 a1=i(con):
   1 a$="fgjgOPSTWX[\_`_c":
   1 a$="ESTE JUEGO CONSISTE EN APOSTAR*FICHAS A LOS NUMEROS Y LETRAS*QUE APARECERAN EN LA RULETA ZX.*SI LA AGUJA SE PARASE EN ALGUN*NUMERO O LETRA DE LOS QUE HAS*APOSTADO,GANARAS EL TRIPLE DE*LO APOSTADO.PERO SI NO OCURRE*ASI,GANARA LA BANCA ZX.*SE PUEDEN HACER COMO MAXIMO UN*TOTAL DE OCHO APUESTAS;PODRAS*APOSTAR TANTAS FICHAS COMO*TENGAS.CUANDO NO DESEES APOSTAR*MAS,PULSA LA ""R""."
   1 a$="    DESPEDIDO DE LA FABRICA     "
   1 X);",LONGITUD= ";I
   1 X)+("CODIGO MAQUINA"
   1 TZX BY YOXXXOY0
   1 Resolucion
   1 RUTINA RESTAURAR       
   1 RUTINA GRAVACION       
   1 RULETA ZX";
   1 Polino1   m
   1 Pinky     
   1 OTRA PARTIDA? (S/N)      
   1 OPERACIONES CON POLINOMIOS
   1 Montecarlo
   1 Microfile3
   1 Microfile2L
   1 Microfile1
   1 MICROHOBBY SEMANAL 53-56
   1 Loteria   
   1 Le mans   
   1 LUIS MIGUEL LACOSTA JIMENEZ C/ BATALLA DE PAVIA,10,5,B ZARAGOZA
   1 LOECHE 6,7,B  MADRID 28007           
   1 Integral  z
   1 HOBBY PRESS
   1 Frecuen   d
   1 Entrada de datos
   1 Descompren
   1 DEVUELVEN LOS CARACTERES        ORIGINALES DEL SPECTRUM   
   1 Comprensor
   1 Complejo  ?
   1 Cirujano  )
   1 CASSETTE MAGAZINE
   1 CARA B    \
   1 CARA B    -
   1 CARA A    
   1 C$=C$+"*"+A$(b(i)+1
   1 B$=E$((pe+1
   1 B$="1.23456789":
   1 B$="("+B$+")":
   1 Almacen   /W
   1 A$=E$((pe+1
   1 A$(b(posx))=
   1 A$(b(i)))+A$(b(i)+1
   1 =X-2X)=X-256
   1 ;"suma(";d$;")= ";b$:
   1 ;"resta(";d$;")= ";b$:
   1 ;"q(x)= ";q$'':
   1 ;"producto(";d$;")= ";b$:
   1 ;"p(x)= ";p$;
   1 ;"ganadora"
   1 ;"f(x)=";c$
   1 ;"f(x) dx"
   1 ;"combinacion";
   1 ;"cociente(";d$;")= ";c$''"resto(";d$;")= ";b$:
   1 ;"cdeffgh";
   1 ;"bloque?"
   1 ;"_`pqpq";
   1 ;"VOLUMEN DE REVOLUCION:":
   1 ;"VIDAS  ";vi
   1 ;"UNA DE TUS APUESTAS ACERTO":
   1 ;"Tipo de boleto:";
   1 ;"Tiene ";q;"! aciertos"
   1 ;"TRAS LAS ULTIMAS APUESTAS";';"   TIENES ";tot;" FICHAS":
   1 ;"TENIAS ";tot;" FICHAS TRAS LA ULTIMA";
   1 ;"TE HA DEVORADO":
   1 ;"Selecciona opcion:"
   1 ;"SUPERFICIE LATERAL:     ":
   1 ;"SI NO QUIERES VOLVER A PROBAR";';"   SUERTE PULSA LA ""N"" SI NO";';"   PULSA CUALQUIER TECLA":
   1 ;"SCREEN ";x;" = ";z(x);" BYTES"
   1 ;"RECUERDA:";
   1 ;"RECUERDA: CUANDO TE PREGUNTE ""ENTENDIDO?"" PULSA UNA TECLA       ":
   1 ;"RECORD= P$: ";"00000"(
   1 ;"RECORD":
   1 ;"RECORD  ";re;
   1 ;"Q.-Arriba         A.-Abajo"
   1 ;"Pulse una tecla":
   1 ;"Pulsar para continuar"
   1 ;"Presione ENTER":
   1 ;"Para utilizar correctamente elprograma cargar el code en  la  direccion 23296 y activarlo con 
   1 ;"PUNTOS";
   1 ;"PUNTOS  ";pu;
   1 ;"PULSA UNA TECLA":
   1 ;"POR  ";r$
   1 ;"PONGA CINTA CON SCREENS";
   1 ;"PLAY DEL CASSETE"
   1 ;"PINKY SE HA METIDO EN LA      NEVERA;EVITA QUE EL MONSTRUO     DE LAS TINIEBLAS LE DEVORE     PARA ELLO DEBERAS APLASTARLO      CON LOS CUBITOS DE HIELO";
   1 ;"PERO SUPERASTE EL RECORD";
   1 ;"PARA SABER SU COLOR";
   1 ;"P$:0000";#0
   1 ;"Otro bloque?(s/n)"
   1 ;"O.-Izquierda     P.-Derecha";
   1 ;"NO PUEDO DESPEJAR ";
   1 ;"NO HAY FRENOS NI MARCHA ATRAS!"
   1 ;"NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN";
   1 ;"NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN":
   1 ;"NIVEL ";ni:
   1 ;"NIVEL  ";ni;" 
   1 ;"Max.Comun.Divisor= ";b$:
   1 ;"LOTERIA PRIMITIVA"
   1 ;"LONGITUD:   ":
   1 ;"LONGITUD DE LOS SCREENS"
   1 ;"LA AGUJA SE DETUVO EN ";c$;" ";n$;
   1 ;"Introduzca los num.         ";
   1 ;"Introduzca los 6 num. de la";
   1 ;"Introduce el segundo polinomio:":
   1 ;"Introduce el primer polinomio:":
   1 ;"Indique opcion:";
   1 ;"INTEGRAL:":
   1 ;"Grabar con SAVE CODE ";oa;",";lo+14
   1 ;"GAME OVER":
   1 ;"FRECUENCIMETRO DIGITAL";
   1 ;"FRECUENCIA": 
   1 ;"FIN DEL PROBLEMA":
   1 ;"Esas apuestas son ";b4;" pesetas"
   1 ;"El ultimo resultado fue :"''" ";v$''"Si desea introducirlo en p o q  pulsa esa tecla. En caso contra-rio pulsa cualquier otra":
   1 ;"ESPERE UN POCO":
   1 ;"ESPERA UN MOMENTO,CARGANDO EL CM":
   1 ;"ESCRIBE TU NOMBRE (max.9)":
   1 ;"ENTENDIDO ?":
   1 ;"ELIGE OPCION":
   1 ;"EL PREMIO RECAYO EN ";c$;" ";n$;
   1 ;"Debes conducir tu coche por el  recorrido,procurando no chocartecontra los muros y recogiendo   las banderas en el menor tiempo posible."
   1 ;"De cuantos num. quiere el";
   1 ;"DE COLOR ";t$:
   1 ;"DE (";z;") TENGO ";E$:
   1 ;"DATOS:":
   1 ;"Cuantos bloques a rellenar?"
   1 ;"CUANTO LO SIENTO";
   1 ;"CIRUJANO"
   1 ;"CARGA LA RUTINA DE EXPANDIR":
   1 ;"CARGA EL BLOQUE DE ";
   1 ;"CALCULANDO":
   1 ;"BONUS ";bo;
   1 ;"BONUS   ";bo;
   1 ;"BLOQUE ";s
   1 ;"ARRANQUE CINTA Y PULSE UNA TECLA":
   1 ;"ARCHIVOS COMPRIMIDOS":
   1 ;"A COMPRIMIR Y PULSE EL";
   1 ;"<=<=<=<=<=<=<=<=<=<=<=<=<=<=<=":
   1 ;":;:;:;:;:;:;:;:;:;:;:;:;:;:;:;";
   1 ;"9........EMPUJAR";
   1 ;"8........DERECHA";
   1 ;"7.........ARRIBA";
   1 ;"6..........ABAJO";
   1 ;"6)NUEVO.POL."
   1 ;"5......IZQUIERDA";
   1 ;"5)M.C.D.";
   1 ;"4)COCIENTE";
   1 ;"3.-RESETEO"
   1 ;"3)PRODUCTO";
   1 ;"2.-INSTUCCIONES";
   1 ;"2-Comprobar aciertos"
   1 ;"2-Apuestas multiples"
   1 ;"2)RESTA";
   1 ;"1.-JUGAR";
   1 ;"1-Rellenar boleto";
   1 ;"1-Apuestas sencillas";
   1 ;"1+[f]'^2";:
   1 ;"1)SUMA";
   1 ;"1  2  3  4":
   1 ;"00000000000000000000000000000000":
   1 ;"0"'"1"'"
   1 ;"(La variable es ";d$;")"
   1 ;"(";i;")";E$:
   1 ;"""R"" EMPEZAR";
   1 ;"""P"" APOSTAR";
   1 ;"""C"" CAMBIAR";
   1 ;"""8"" DERECHA";
   1 ;"""5"" IZQUIERDA";
   1 ;" fix        "
   1 ;" Xmax       "
   1 ;" SE ACABO.YA NO TIENES DINERO."'''"SI TE QUIERES ARRIESGAR A JUGAR"'"OTRA PARTIDA,PULSA CUALQUIER"'"TECLA,DE LO CONTRARIO PULSA"'"LA ""N"".":
   1 ;" INCLUYE SIEMPRE ""ABS"" EN LA BASE DE LAS POTENCIAS (^)"
   1 ;" Hallo primero ";
   1 ;" HAS TENIDO SUERTE";
   1 ;" FICHAS":
   1 ;" FICHAS"
   1 ;" APUESTA.AHORA TIENES ";total;" FICHAS":
   1 ;"  PULSA UNA TECLA PARA CONTINUAR"
   1 ;"     PULSA UNA TECLA":
   1 ;"      PULSA UNA TECLA":
   1 ;"      NOTA:EL ERROR DE INTEGRA- CION PUEDE SER APRECIABLE SI EL NUMERO-PRECISION ES BAJO ,SIN EMBARGO,EL TIEMPO DE EJECUCION CRECE SI LO HACE ESTE. 4 O 5 SON   BUENAS SOLUCIONES SI LAS FUNCIONES A INTEGRAR SON SENCILLAS.                                         EL ERROR DE INTEGRACION ES MENOR O IGUAL QUE LA AMPLITUD   DEL INTERVOLO DIVIDIDO POR 180 YPOR 16^(NUM-PRECISION) Y TODO   MULTIPLICADO POR EL VALOR MAXIMO DE LA DERIVADA CUARTA DE LA FUNCION INTEGRADA EN EL INTERVALO.                                      PULSA UNA TECLA PARA CONTI-NUAR."                    
   1 ;"      ";
   1 ;"      ":
   1 ;"       PULSA UNA TECLA":
   1 ;"       ";
   1 ;"       ":
   1 ;"         ";
   1 ;"         ":
   1 ;"          "
   1 ;"           ":
   1 ;"             ":
   1 ;"                ":
   1 ;"                 ":
   1 ;"                  ";:
   1 ;"                  ";
   1 ;"                     ":
   1 ;"                                                               ":
   1 ;"                                                                                    "
   1 8888888888888888888888888888888888888888888888888888888888888888
   1 /t);" Hz ":
   1 ----FRECUENCIMETRO-----
   1 --------DIGITAL--------
   1 ----------V&A----------
   1 ,r;" <= ":
   1 ,pr+(shift
   1 ,o)="w"))=1
   1 ,o)="w")):
   1 ,o)="v")+(z$(11
   1 ,o)="v")*117
   1 ,i)-m(ind,i):
   1 ,i)+m(ind,i):
   1 ,"fadofbdnfcdmecdldcelccflcbfmgcfnhcgnhbgmibhmfdimfecleegebldehebmdfhfbncfifbkcgjfckchdkbhhgdjahhhcjdhhibjehcifhgidifi"
   1 ,"baiabbibbcicbdidcdbeieddbfifedbgigfdbhihgdbiiihhbjijbkcjikghblildjbmhlfhbnglejcngmehcmhmfjdmimdhdningjenhnemgnfmfn"
   1 ,"ajbjbicjbkbhdjblbgejclbmbffjdlbnbegjelcnbdhjdnbchiijenbbhhikfnbaghihilgncaggfhhlhndagfehglineageffdhfagdefgagcdfhagbia"
   1 ,"aebececdcfcccgcbdgdbchebcifbcjgbckhbclhacmhcbmhdbnhedmiedndieneifnfifmfhflghfkhhgnihhniginfehmeehldehkijhj"
   1 ,"achebcgeccfedceeecdefccegcbehcbficbgjccgbhjddgbijeegbjjffgbkjgggbljhhgbmjibnjjcnjkdnjlenjmfnjngninhnhmhlhkhjhigifieididjdkdl"
   1 ,"abjnbbincbhndbgnebfnfbengbdnhbcnibbnicbmidbliebkifbjigbiihbhhhchghdhfhehgddlfdeledflddglcdhlbdilbejlbfjkcfjjdfijefhjffgjgffjejdj"
   1 ,"aadoabdnacdmbcdlccdkdcdjecejfcfjfdfifagifbhifeiigejihecjhdbjhcbihbbhbnchcndhakdgbkdffmdeflddglfnhlgnhmhnhfhgig"
   1 +" PUNTOS":
   1 *f(x)^2 dx       "
   1 **COMPROBANDO ACIERTO**
   1 ***TABLERO APUESTAS***
   1 ***REPARTO PREMIO***
   1 ***MOVIMIENTO AGUJA***
   1 ***INSTRUCCIONES***
   1 ***FICHAS APOSTADAS***
   1 ***DIBUJO RULETA***
   1 ***APUESTAS***
   1 ***********************
   1 *(o$(ind-1
   1 *((y$="v")+(y$="w"))
   1 )=p(gra1,5
   1 )=o$(ind):
   1 )=(x-a)*111
   1 )="343434343434343434343434343434":
   1 )/p(gra2,4
   1 ),m)=raro)=1
   1 ),m));" para obtener ";
   1 )*p(gra1-gra2+1
   1 ))+"("+B$+")":
   1 (z$(p2+p3*(p2=0
   1 (ey-py)=-1
   1 (ex-px)=-1
   1 ((xmax-a)*(xmax-b))>0
   1 ("+c$+")":
   1 ("+B$+")^2":
   1 ("+B$+")^(1/("+C$+"))":
   1 "wtk","thc","tac","tha","ahc","vuk","uhd","ubd","uhb","bhd"
   1 "numero impar de parentesis !!!":
   1 "fix ";fix:
   1 "b^2+h^2=d^2"
   1 "a^2+h^2=c^2"
   1 "a","b","c","d","h","t","u","v","w"
   1 "Xmax ";xmax:
   1 "QUIERES SU LONGITUD? (S/N)";
   1 "QUIERES LA SUPERFICIE? (S/N)";
   1 "Precision(de 3 a 9)=";j
   1 "Origen= ";:
   1 "Origen final= ";of
   1 "Origen actual= ";oa
   1 "OTRA?(s/n)";s$
   1 "Numero:";g(d)
   1 "Numero:";f(o)
   1 "Num. de pantallas a comprimir ";n
   1 "Nombre de la variable? ";
   1 "Nombre con el que quiere salvar el bloque de screens= ";
   1 "NO HAY DATOS":
   1 "NO HAY ""="" !!!":
   1 "Mete f(x)=";
   1 "METE LOS DATOS  "'
   1 "Longitud= ";lo
   1 "Longitud= ";:
   1 "Limite superior b=";b
   1 "Limite inferior a=";a
   1 "LONGITUD= ";i
   1 "INTEGRAL"
   1 "Ejecutar con USR ";p
   1 "EXPRESI0N NO VALIDA":
   1 "E-Integral","F-Complejo"
   1 "E-Comprensor","F-Descompren","G-Microfile1","H-Microfile2","I-Microfile3","J-Resolucion"
   1 "Direccion ejecucion= ";de
   1 "Direccion donde se ha cargado el bloque= ";m:
   1 "Direccion donde se almacena los archivos comprimidos= ";m
   1 "Direccion de ejecucion= ";:
   1 "CUANTO QUIERES APOSTAR AHORA ?  ";apu:
   1 "CUANTO APUESTAS ? ";apu:
   1 "CUAL ES LA INCOGNITA ? ";
   1 "A-Le mans","B-Polino1","C-Loteria","D-Pinky"
   1 "A-Frecuen","B-Montecarlo","C-Almacen","D-Cirujano"
   1 "A","B","C","D","E","F","G","H"
   1 "@@ && &&&&&  &&&&&&& &&& &&&&  @";"@@                             @"
   1 "@@    @         @          &   @";"@@ @@ @         @@@            @";"@@ @@ @@@@@  @@@@@@@ @@@ @@@@  @"
   1 "@@     @@@                 @   @";"@@&&& @&&&&     @  &&&&&  &@&  @"
   1 "@& @@ &&&&&  @@@&&&& &&& &&&&  @";"@  @@        @@&               @"
   1 "@& && @&&&@  @&&&&&& &&& &&&&  @";"@     @
   1 "@  @@@&&  &&&@&  @@ @@ @@      @";"@ &&&&       @   && && &&  &&& @"
   1 "@     @ @ @  & &@&    @@@@@  @@@";"@ &&  & @ &     &     &&&&&  &&@"
   1 "@       @          @           @";"@       @          @           @";"@@ @@ @@@@@  @@@@@@@ @@@ @@@@  @"
   1 "@            &                 @";"@   @           @@             @";"@@ @@ @@@@@  @@@@@@@ @@@ @@@@  @"
   1 "1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G"
   1 "0= BASIC  3= CODIGO MAQUINA ";X
   1 " LE MANS "
   1 !!RECORD!!
   1  estan en a,b,c,d en modo GRAFICO,respectivamente.       ":
   1  de su bloque";
   1  RUTINA PRINCIPAL
   1   Por favor, elija un programa  
   1    PULSE UNA TECLA PARA JUGAR   
   1    Matti Hemmi 1985 
   1    @  @                 @"
   1        RULETA ZX 
   1        PINKY        PINKY       
   1         REGLAS DEL JUEGO        
   1                                 C 
   1